#!/usr/bin/perl -w
use strict;
use CGI;

my $c = new CGI;
print $c->redirect('login.cgi');
